home *** CD-ROM | disk | FTP | other *** search
/ Belgian Amiga Club - ADF Collection / BS1 part 23.zip / BS1 part 23 / Hisoft Basic v1.03 disk 2.adf / graphics / sine.bas < prev    next >
BASIC Source File  |  1988-11-25  |  51b  |  5 lines
  1. FOR x=0 TO 617
  2. y=90+80*SIN(x/40)
  3. PSET (x,y)
  4. NEXT x
  5.